﻿Imports DotNetNuke.Framework

Partial Class DMXBrowser
 Inherits DotNetNuke.Framework.PageBase

#Region " Controls "
 Protected WithEvents scriptmanager As Control
 Protected WithEvents ctlFiles As Global.Telerik.Web.UI.RadFileExplorer
 Protected WithEvents RadScriptBlock1 As Global.Telerik.Web.UI.RadScriptBlock
#End Region

 Private Sub Page_Init(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Init
  DotNetNuke.Framework.AJAX.RegisterScriptManager()
 End Sub

 Private Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

  Dim path As String = Request.QueryString("Path")

  Me.ctlFiles.Configuration.SearchPatterns = New String() {"*.*"}
  Me.ctlFiles.Configuration.ViewPaths = New String() {path}
  Me.ctlFiles.Configuration.DeletePaths = New String() {}
  Me.ctlFiles.Configuration.MaxUploadFileSize = 604800000
  Me.ctlFiles.Configuration.UploadPaths = New String() {path}
  Me.ctlFiles.LocalizationPath = Me.TemplateSourceDirectory & "/App_LocalResources/"
  Me.ctlFiles.Language = CType(Page, PageBase).PageCulture.Name

  Me.ctlFiles.Configuration.ContentProviderTypeName = "Bring2mind.DNN.Modules.DMX.RadEditorContentProvider.ContentProvider, BRING2MIND.DNN.MODULES.DMX.RADEDITORCONTENTPROVIDER"

 End Sub

End Class
